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FOREWORD 


This  technical  report  documents  the  research  involved  in 
creating,  submitting  and  retrieving  files  over  various  computer 
networks  located  at  the  Naval  Surface  Weapons  Center,  White  Oak, 
Maryland,  and  the  Naval  Air  Development  Center,  Warminster, 
Pennsylvania.  The  ultimate  goal  of  this  report  is  to  present  the 
user  with  a  systematic  approach  to  interactive  communications  with 
the  Naval  Air  Development  Center's  Central  Computer  System  in  the 
development  and  testing  of  Digital  Acoustic  Sensor  Simulator  (DASS) 
operational  software  on  the  AN/UYS-1  Advanced  Signal  Processor. 

The  work  described  herein  was  funded  under  Program  Element 
63708N ,  Task  Area  Work  Unit  Number  AD/CAC  Validation  S0821. 


Approved  by: 
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Terminal  emulator.  Extreme  revisions  would  have  been  necessary  to 
make  this  emulator  operable  under  the  above  changes.  As  a  result, 
the  Interactive  communication  techniques  presented  in  this  report 
were  developed  to  accommodate  loadtape  creation  and  retrieval. 

The  following  chapters  represent  the  communication  links 
necessary  to  obtain  a  loadmap  listing  and  permanent  file  containing 
ASP  operational  software.  Information  contained  in  Chapters  2 
through  8  Is  written  for  use  on  a  Zenith  29  video  display  terminal, 
although  this  Information  could  be  adapted  to  fit  almost  any 
terml  nal . 


Outlined  below  are  the  names  of  the  computer  systems 
In  this  report. 


referenced 


Naval  Surface  Weapons  Center  Computers 

Computer  Branch  VAX  11/750 
Surface  ASW  Division  VAX  11/780 
Signal  Processing  Branch  AN/UYK-20 
Signal  Processing  Branch  AN/UYS-1 


(MILNET  VAX) 
(ASW  VAX) 
(UYK-20) 
(ASP) 


Naval  Air  Development  Center  Computers 

Front  End  Processor 
Central  Computer  System 
System  A  CDC  6600 

System  B  CDC  CYBER  170  Model  760 

System  C  CDC  CYBER  170  Model  175 

System  D  CDC  CYBER  170  Model  760 

DEC  VAX  11/780 


(FEP) 

(CCS) 


(ARPANET  VAX) 
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CHAPTER  2 
TERMINAL  SETUP 


The  Zenith  29  video  display  terminal  must  be  correctly 
configured  before  communication  over  the  networks  (MILNET  and 
ARPANET)  can  take  place.  To  check  the  terminal  configuration, 
depress  the  SET  UP  key  found  on  the  upper  left-hand  side  of  the 
terminal.  Menu  A  will  be  displayed  at  the  bottom  of  the  screen.  To 
check  other  menus,  depress  the  letter  corresponding  to  the  menu. 
Each  menu  has  from  one  to  four  options.  To  change  an  option,  depress 
the  number  corresponding  to  that  option.  One  of  the  options  that  may 
require  changing  Is  the  baud  rate  on  Menu  B.  To  do  this,  depress 
'SET  UP',  '8'  to  get  Menu  8,  and  then  toggle  the  ' 1  *  key  until  the 
desired  baud  rate  Is  displayed.  The  configuration  for  the  Zenith  29 
terminal  should  be  set  up  as  follows: 

a.  **  SETUP  MENU  A  **  (Ver  1.05)  on  line  MENUS  -A-  to  -G- 


b. 

c. 

d. 

e. 

f. 
9* 


MENU  B  BAUD  1200  PARITY  space  DUPLEX  full  HANDSHAKE  software 
MENU  C  PORT  normal  MODE  ansll  HOLD  SCRN  MONITOR  off 
MENU  D  SET  CLOCK  STATUS  LINE  on  WRAP  off  SCREEN  SAVER  off 
MENU  E  KEYPAD  SHFT  off  KEYPAD  ALT  off  REPEAT  on  CLICK  on 
MENU  F  AUTO  CR  off  AUTO  LF  off  CURSOR  blnk  line  FREQ  60  Hz 
MENU  G  CHAR  SET  normal  FILL  SCREEN  ATTRIBUTES  TEST 


.-•%  •’W 

;v-*\ v2 


.♦«*  "****•« 


*  m** 


■“«  r  » •*; 
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CHAPTER  3 
LOGIN  PROCEDURES 


Connected  to  the  Zenith  29  terminal  is  a  terminal  switching 
mechanism  (Black  Box)  and  a  modem.  The  Black  Box  has  two  settings. 
Setting  A  is  for  direct  hookup  with  the  ASW  VAX.  Setting  B  is  for 
communication  with  other  networks.  Unless  otherwise  noted,  this 
switch  should  be  set  to  B. 

With  CAPS  LOCK  key  depressed,  type  'ATE1F1'.  This  command  gets 
the  attention  of  the  modem.  The  terminal  response  is  'OK1. 

With  CAPS  LOCK  key  depressed,  type  'ATDT43273'.  This  command 
gets  the  attention  of  the  dial  tone  and  dials  x43273.  This  is  the 
telephone  number  of  the  MILNET  VAX.  The  terminal  response  is 
'CONNECT*.  If  the  telephone  line  is  busy,  typing  'CRTL/C'  will 
abort . 

The  MILNET  VAX  and  ARPANET  VAX  both  use  the  UNIX  operating 
system.  UNIX,  unlike  the  VMS  operating  system  on  the  ASW  VAX,  is 
case  sensitive.  Therefore,  all  system  commands  are  to  be  typed  in 
lower  case. 

After  successful  connection  is  achieved  to  the  MILNET  VAX  the 
following  message  will  appear  on  the  terminal:  (NOTE:  A  ficticious 
account  name  of  'nswc'  Is  used  in  all  examples.  The  password,  when 
typed  in,  is  not  echoed  to  the  terminal.) 

MILNET  HOST  "nswc-wo"  (VAX  1 1/750 : UN  I  X : 4 . lbsd ) 

For  login  or  problems  call  Bob  Archer  394-1909 

login:  nswc 
Password : 

Last  Login:  day  date  time  on  ttyxx 

WELCOME  to  the  Naval  Surface  Weapons  Center-White  Oak  Network  Front  End 


l-> 
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To  connect  to  the  ARPANET  VAX,  type  'telnet  nadc'  at  the  l-> 
prompt.  The  following  message  will  appear  on  the  terminal: 

Trying... 

Open 

Remote  echo 


NADC  CCS  VAX/UNIX  4.1BSD 

login:  nswc 
Password: 

Last  Login:  day  date  time  on  ttyxx 

ARPANET  users  should  use  the  command  "ccs"  to  access  the  CCS 
Host  computers 


It  should  be  pointed  out  that  UNIX  prompts  on  the  MILNET  VAX 
(#->)  and  ARPANET  VAX  (X)  are  different.  Also  note  that  the  .login 
files  at  both  sites  should  contain  the  following  two  commands: 

a.  set  term*vtl00 

b.  stty  1200  dec 

These  commands  Identify  the  terminal  as  type  VT100,  the  baud  rate  as 
1200,  and  set  the  Digital  Equipment  Corporation  control  sequences 
(l.e.  CTRL/C  to  Interrupt,  CTRL/U  to  kill,  and  DELETE  to  erase).  To 
display  the  terminal  setting  and  environment.  Issue  the  following 
commands : 

a.  stty  all  (or  stty  everything  for  a  full  listing) 

b.  prlntenv 


CHAPTER  4 


UNIX  FILE  CREATION 


File  creation  for  execution  of  certain  FASP  procedures  Is  done 
on  the  ARPANET  VAX  using  either  the  "cat"  command  or  the  "vi"  editor. 
The  "cat"  command  Is  similar  to  the  VMS  command  CREATE.  This  method 
can  be  used  when  creating  short  Input  file  streams.  The  "vi"  editor 
has  full-screen  editing  capabilities  and  should  be  used  to  create 
lengthy  files  or  to  make  modifications  to  existing  files.  Appendix  A 
contains  a  brief  summary  of  the  vi  editor  commands.  Once  an  Input 
file  Is  created,  an  NADC-resI dent  program  entitled  USRDTF  is  used  to 
submit  the  file  to  the  Central  Computer  System  (CCS)  for  FASP 
processi ng. 

The  Input  job  streams  created  for  execution  on  the  Central 
Computer  System  simulate  batch  job  processing.  A  sample  input  stream 
to  obtain  a  source  listing  of  a  FASP  data  base  program  using  the 
"cat"  command  follows: 

%  cat  >  Itext  (directs  output  to  a  file  entitled  ltext) 

/JOB 

DASS,CM42000,T20. 

ACCOUNT, NSWC.xxxxx.  (xxxxx  to  be  replaced  with  password) 
GET.FASP/UN-SC3024. 

FASP(LTEXT)  ID=DS,TEXT=SL 
/EOR 

♦COMPILE  PARAMS 
/EOF 

CTRL/D  (CTRL/0  denotes  end  of  file) 

* 

NOTE:  The  /JOB  record  denotes  that  this  Is  a  batch  job.  The  /EOR 
and  /EOF  records  replace  the  7/8/9  and  6/7/8/9  cards  from  batch  decks 
respectl vely. 

The  following  Is  a  partial  listing  of  an  Input  stream  used  to 
create  an  operational  software  loadtape.  After  this  file  has  been 
submitted  via  USRDTF  to  the  CCS  for  processing,  two  output  files  are 
created.  One  file  contains  loadmap  Information.  This  file  Is  the 
output  file  created  when  the  submit  option  from  USRDTF  is  selected. 
The  other  output  file  Is  a  direct  access  permanent  file  which 


contains  encoded  operational  software.  The  contents  of  this 
permanent  file  will  eventually  be  loaded  into  the  Advanced  Signal 
Processor  (ASP)  for  testing  and  debug  purposes.  The  naming 
conventions  used  for  loadtape  permanent  file  names  consists  of  the 
two-letter  FASP  data  base  identifier  (i.e.  ID=DS)  and  a  five-digit 
date  in  the  form:  ymmdd.  (DS40911  would  be  the  name  of  a  loadtape 
created  on  the  OS  data  base  on  9/11/84.) 

/JOB 

DASS ,CM42000,T50. 

ACCOUNT, NSWC.xxxxx. 

GET,FASP/UN*SC3024. 

FASP(GENLDMD)  ID*DS ,PFNAME*DS4091 1 
ATTACH, L0ADTP-0S40911. 

FASP(ENCODTP)  VSN=NA ,PFNAME=DS4091 1 
/EOR 

LINKEROFF 

/EOR 

PHASE  DASSAP,ST0RAGE*AP,0 

HEADER  FG*2,FN*2,RN=1 

INCLUDE  DSMCRS 

PHASE  DASSSGP,ST0RAGE»CP,0 

ACTION  DOUBLE 

HEADER  FG»2,FN»2,RN»2 

INCLUDE  GDAU$C 

SEG  512 

INCLUDE  SNAP 

INCLUDE  MJFTASK 

INCLUDE  MJFMJFO 


SEG 

INCLUDE  AUEXIHOC 
INCLUDE  CPMEM 
INCLUDE  DSMCRS 
ENTRY  AUEXSTRT 
EOF 
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CHAPTER  5 

INTERACTIVE  FASP  PROCESSING 


Chapter  4  outlined  the  creation  of  sample  FASP  batch  jobs.  FASP 
can  also  be  accessed  interactively  from  the  ARPANET  VAX  by  issuing 
the  command  'ccs  c'  at  the  %  prompt.  This  command  is  used  to  gain 
access  to  the  Central  Computer  System  (CCS)  C  System  host  computer. 
The  following  login  sequence  to  the  CCS  C  System  appears  on  the 
termi nal . 


NOTE:  After  typing  the  'ccs  c'  command,  the  Zenith  29  terminal 
configuration  must  be  changed  from  full  to  half  duplex.  To  do  this, 
depress  'SET  UP',  '8'  to  get  to  Menu  8,  and  then  toggle  the  '3'  key. 


%  ccs  c 

Trying  access  to  cccO 
[1]  635 

Connected  (type  "  . “  for  immediate  disconnect) 
#cal 1  cccO 

#CALL  COMPLETED  TO  CCCO, 3 


84/09/28  14.47.09. 

KRONOS  2.1.1-SYS-CMR25-NADC. 

USER  NUMBER:  NSWC 
PASSWORD:  XXXXX 
TERMINAL:  146,  TTYS 

HASH :  FMJ I ,  MASTER  OEVICE  3 
RECOVER  /SYSTEM:  BATCH 
/ 

To  access  FASP,  the  following  two  commands  are  typed  at  the 
KRONOS  prompt  (/).  A  login  message  will  then  appear  on  the  screen. 
The  FASP  prompt  is  F?.  The  User  and  Key  parameters  are  similar  to 
account  and  password  parameters. 
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/GET,FASP/UN=SC3024. 

/FAS P. 

NADC  FASP  VERSION  4.1.9  ENTER  LOGON  OR  HELP 
F?  LOGON  FAS P *AS P , USER *nnn ,KEY=xxxxxx 
ASP  FASP  VERSION  04  RELEASE  13.0 
BULLETIN  AVAILABLE 


There  are  two  types  of  FASP  commands  available:  immediate  and 

procedural  commands.  Immediate  commands  serve  to  support  Interactive 
usage.  Procedural  commands  operate  directly  on  FASP  data  bases. 
Immediate  commands  are  executed  immediately  while  procedural  commands 
are  placed  on  a  stack.  Sequential  stack  execution  is  initiated  after 
receipt  of  an  end-of-command-sequence  (eocs)  Input  (a  null  carriage 
return).  After  a  procedure  on  the  stack  has  been  activated,  FASP 
will  prompt  the  user  for  any  input  data  records.  FASP's  text  editor, 
FATE,  is  used  for  extensive  input  data.  Listed  below  is  a  sample 
input  stream  which  modifies  an  arithmetic  processor  microcode  program 
entitled  SRFFT.  The  TAB  command  is  used  to  set  up  column  alignment. 
The  tab  character,  TC,  Is  defined  as  #.  The  MP  command  moves  the 
pointer  to  line  65  of  the  source  code.  The  I  command  Inserts  the 
next  two  lines  of  code  after  line  65.  The  null  carriage  return 
terminates  the  insert  mode.  L  *, NOLID  lists  the  entire  program  minus 
line  identifiers.  EE  ends  the  editing  session  and  continues 
processing  the  MODSW  procedure.  Once  the  procedure  completes,  the 
output  file  Is  examined  and  saved  as  a  permanent  file  entitled 
OSRFFT.  The  EF  command  ends  FASP  processing. 

F?  MODSW  ID*DS,LS»CADIME,XLAT*xxxxx 
001  ADDED 

DATA  RECORD  MODSW  REQUIRED 
F?  <CR> 

BEGIN  PROCEDURE  MODSW 

FASP  TEXT  EDITOR  VERSION  1.5 

NAME  OF  MDENT  TO  BE  CREATEO?  SEP254ADG 

LIBRARY  DIRECTIVE?  MOD  SRFFT 

COMMAND?  TAB  9,17,50,72 

COMMAND?  TC,# 

COMMAND?  MP  SRFFT. 65 
COMMAND?  I 

[.  4  ?  #AECW#T0AR IR . 2#CCR#  18 

[.  5  ?  #AECW2#ARIR.2C,SF . 0H#MCCR= -CCR#  19 

[.  6  ?  <CR> 

COMMAND?  L  *, NOLID 
COMMAND?  EE 
END  EDITOR 


*  *  -#»  ■  ;  _  * 
vvs^v-% 
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COMPLETED  PROCEDURE  MODSW 
OUTPUT  IS  AVAILABLE 
F?  EXAMINE 

COMMAND?  FS  /ERRORS/ 

0  ERRORS  FLAGGED  IN  THIS  TRANSLATION 
COMMAND?  SAVE ,OSRFFT 
COMMAND?  EE 
END  EDITOR 
F?  EF 

After  FASP  has  terminated,  the  FASP  dayflle  Is  printed  and  the 
KRONOS  prompt  (/)  is  issued.  Type  'bye'  at  the  prompt  to  disconnect 
from  the  CCS  C  System  and  return  to  the  ARPANET  VAX. 

NOTE:  After  typing  'bye',  the  Zenith  29  terminal  configuration  must 
be  changed  back  to  full  duplex.  To  do  this,  depress  'SET  UP',  '  B '  to 
get  to  Menu  B,  and  then  toggle  the  '3'  key. 
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CHAPTER  6 

USER  DATA  TRANSFER  FILE  (USRDTF ) 


To  submit  an  input  stream  to  the  CCS  for  processing,  the 
following  command  is  issued  at  the  %  prompt: 

a.  usrdtf 

USRDTF  is  a  menu-driven  routine.  In  response  to  the  above  command, 
the  following  menu  appears  on  the  terminal: 

(1)  Transfer  a  file  downline  from  CCS-to-VAX 

(2)  Transfer  a  file  upline  from  VAX-to-CCS 

(3)  Submit  a  job  (VAX  File)  to  the  CCS  or  FEP 

(4)  Retrieve  job  output  from  the  CCS  or  FEP 

(5)  Get  a  CATLIST  of  files  on  a  primary  CCS  account 

(6)  Get  a  CATLIST  of  files  on  an  alternate  CCS  account 

(7)  Get  a  CATLIST  of  files  on  the  current  VAX  account 

(8)  List  a  VAX  file  on  the  terminal 

(9)  Exit  from  the  menu 

(10)  Help  (additional  Information) 

Assuming  that  the  loadtape  input  stream  is  on  an  ARPANET  VAX  file 
entitled  'loadtape',  submission  of  that  file  to  the  CCS  is 
accomplished  by  typing  '3'  at  the  SELECT:  prompt.  The  following 
sequence  will  appear  on  the  terminal: 

SELECT:  3 

CCS  Account  Number:  nswc 

VAX  file  containing  job  input:  loadtape 

ENTER  CCS  PASSWORD: 

BEGIN  UPLINE  JOB  SUBMITTAL 

>>>>>>> 

TOTAL  NUMBER  OF  BLOCKS  TRANSMITTED  =  7 
TOTAL  NUMBER  OF  OATA  BYTES  TRANSMITTED  =  1438 

Job  successfully  submitted  --  jobname  is  #ACUF  0DASSCUF 
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The  jobname  is  listed  twice;  the  first  name  (#ACUF)  is 
associated  with  the  Front  End  Processor  (FEP),  the  second  name 
(@DASSCUF)  is  associated  with  the  CCS.  It  is  generally  helpful  to 
write  down  the  second  jobname  at  this  point.  Depending  on  the  length 
of  the  job  and  the  system  usage,  turnaround  could  take  an  hour  or 
two.  Normally  turnaround  time  is  about  10  to  15  minutes.  There  are 
two  ways  to  find  out  if  the  job  has  executed.  The  first  way  is  to 
type  '4'  at  the  SELECT:  prompt.  If  the  output  file  exists,  the 
following  sequence  will  appear  on  the  terminal: 

SELECT:  4 

CCS  Account  Number  [nswc]:  <CR> 

VAX  file  to  contain  job  output:  ds40911.map 
Name  of  job  output  file  to  retrieve  (name  must  begin  with 
"#"  or  [default  is  highest  priority]:  Odasscuf 
ENTER  CCS  PASSWORD: 

BEGIN  DOWNLINE  FILE  TRANSFER 

<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<< 

<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<< 

<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<< 

<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<< 

<<<<<< 

TOTAL  NUMBER  OF  BLOCKS  TRANSMITTED  =  263 
TOTAL  NUMBER  OF  DATA  BYTES  TRANSMITTED  =  58362 

Output  from  job  #ACUF  3DASSCUF  is  in  VAX  file  ds40911.map  in  current 
di  rectory 

If  the  output  file  does  not  exist  (i.e.  the  job  has  not  yet  completed 
processing),  the  following  sequence  will  appear  on  the  terminal: 

SELECT:  4 

CCS  Account  Number  [nswc]:  <CR> 

VAX  file  to  contain  job  output:  ds40911.map 
Name  of  job  output  file  to  retrieve  (name  must  begin  with 
"#"  or  [default  Is  highest  priority]:  @dasscuf 
ENTER  CCS  PASSWORD: 

ERR0R--CCS  file  does  not  exist 


A  second  way  of  testing  to  see  if  the  job  has  been  executed  (and 
a  helpful  way  to  find  out  the  jobname  If  you  have  forgotten  it)  is  to 
type  '5'  at  the  SELECT:  prompt. 


SELECT:  5 


CCS  Account  Number  [nswc]  :  <CR> 

Send  CATLIST  to  ( f )  1 1 e  or  (t)ermlnal  [t]?  :  <CR> 

(l)ocal  or  (c)ommon  permflles  [c]?  :  <CR> 

ENTER  CCS  PASSWORD: 

BEGIN  DOWNLINE  TRANSFER 

< 

TOTAL  NUMBER  OF  BLOCKS  TRANSMITTED  *  1 
TOTAL  NUMBER  OF  DATA  BYTES  TRANSMITTED  -  207 

Symbol  meanings:  #  or  @--Queue  File/Job  Output,  *--Ind1rect  Permfile. 
When  output  pauses:  <SPACE>  to  continue,  <RUB>  or  <DEL>  to  abort. 


#ACUF  *C ITS024  *CITS025  *CLTSOOO  *DCTS000  GDASSCUF 
DS40911 


Once  the  output  file,  ODASSCUF,  has  been  successfully  retrieved 
from  the  CCS,  the  file  ds40911.map  resides  on  the  ARPANET  VAX.  The 
permanent  file,  DS40911,  on  the  CCS  account  must  also  be  retrieved 
using  USRDTF.  To  do  this,  type  *1'  at  the  SELECT:  prompt. 

SELECT:  1 

CCS  Account  Number  [nswc]:  <CR> 

CCS  File  Name:  ds40911 

VAX  File  Name  [ds40911]:  <CR> 

(d)lrect  or  (i)ndlrect  access  [1]:  d 
(1)ocal  or  (c)ommon  permflles  [c]:  <CR> 

Character  set  (a ,b,d ,h ,k  ,p,q , s )  [d]:  <CR> 

ENTER  CCS  PASSWORD: 

BEGIN  DOWNLINE  TRANSFER 

<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<< 

<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<< 

<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<< 

<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<< 

<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<< 

<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<< 

<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<< 

TOTAL  NUMBER  OF  BLOCKS  TRANSMITTED  *  444 
TOTAL  NUMBER  OF  DATA  BYTES  TRANSMITTED  -  99329 

Successful  Transfer 


To  list  to  the  terminal  the  file  just  transferred,  type  '8*  at 
the  SELECT:  prompt. 
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SELECT:  8 


Name  of  VAX  file  [ds4091 1 ] :  <CR> 

When  output  pauses:  <SPACE>  to  continue,  <RUB>  or  <DEL>  to  abort 


The  output  file  Is  printed  here. 


Once  all  of  the  files  have  been  transferred  from  the  CCS  to  the 
ARPANET  VAX,  type  ’9'  at  the  SELECT:  prompt  to  exit  USRDTF . 

NOTE:  USRDTF  uses  brackets  [  ]  to  denote  defaults  at  the  various 
prompting  levels.  To  use  the  default  supplied,  depress  the  carriage 
return  key,  designated  as  <CR>  In  the  above  examples. 
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CHAPTER  7 


FILE  TRANSFER  PROTOCOL  (FTP) 


Once  USRDTF  has  successfully  retrieved  a  FASP  output  file  from 
the  CCS  to  the  ARPANET  VAX,  a  method  was  required  to  transfer  files 
between  sites.  File  Transfer  Protocol  (FTP)  provides  the  capability 
of  transferring  ASCII  and  core-image  files  between  network  hosts. 
Appendix  B  lists  the  various  FTP  commands  available  and  gives  a  brief 
description  of  each  command. 

FTP  can  be  implemented  from  either  the  MILNET  VAX  or  ARPANET  VAX 
to  send  and  retrieve  files.  All  messages  sent  by  the  remote  host 
begin  with  a  three-digit  number  and  generally  indicate  successful 
completion  or  failure  of  a  given  command.  The  prompting  character 
for  local  FTP  commands  Is  >. 

Below  is  a  sample  FTP  session  used  to  transfer  a  file  from  the 
ARPANET  VAX  to  the  MILNET  VAX. 

%  ftp  nswc-wo 

TCP  trying  26.0.0.24 

Connections  established 

220  nswc-wo  Server  FTP 

>  1  og 

Username:  nswc 

331  Enter  PASS  command 

>  pass 
Password: 

230  User  logged  in 

>  send 

Local  file:  ds40911 
Remote  file:  ds40911 
200  OK 

125  Storing  Mds40911"  started  okay 
226  File  transfer  completed  okay 

>  quit 

221  Disconnect  received,  closing  connections 

Transferred  21661  bytes  In  5  secs  (34657  bps,  4332  bytes/sec) 

% 
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After  the  user  has  transferred  the  loadmap  file  and  direct 
access  permanent  file  from  the  ARPANET  VAX  to  the  MILNET  VAX, 
connections  with  these  two  systems  can  be  closed  as  follows: 

%  logout 

(Remote  close.)  Killed 

2->  logout 
S  *@*#0 
NO  CARRIER 


At  this  point,  network  communications  which  required  the 
terminal  switching  mechanism  to  be  at  Setting  B  on  the  Black  Box  have 
now  been  completed.  To  return  the  terminal  to  Its  original 
configuration  of  9600  baud,  depress  SETUP,  1 B '  to  get  to  Menu  B,  and 
toggle  the  '1*  key  until  9600  baud  appears.  Return  the  switching 
mechanism  to  Setting  A. 
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CHAPTER  8 
KERMIT 


KERMIT  is  a  protocol  developed  by  Columbia  University  for 
reliable  file  transfers  between  computers  over  terminal  (tty)  ports. 
KERMIT  is  not  an  acronym.  It  was  named  after  Kermit  the  Frog,  star 
of  the  television  series  The  Muppet  Show. 

Since  the  ASW  VAX  has  no  communications'  network  of  its  own, 
KERMIT  is  employed  to  retrieve  files  resident  on  the  MILNET  VAX.  In 
order  for  KERMIT  protocol  to  occur,  a  KERMIT  program  must  be  running 
on  each  end  of  the  communication  line  --  one  on  the  ASW  VAX  and  one 
on  the  MILNET  VAX.  The  two  KERMIT  programs  exchange  message  packets. 
Each  packet  is  In  a  special  format  that  the  other  KERMIT  can 
understand. 

The  terminal  port  characteristics  on  the  ASW  VAX  over  which 
connection  to  the  MILNET  VAX  is  made  are  as  follows: 


Interactl ve 
No  Hostsync 
Wrap 
Ei ghtbi t 
Ful 1 dup 
Hangup 
Set  speed 


Echo 

TTsync 

Scope 

No  Broadcast 
Modem 

No  Brdcstmbx 
No  ANSI  CRT 


No  Advance  video  No  Edit  mode 


Type_ahead 
Lowercase 
No  Remote 
No  Readsync 
No  Local__echo 
No  DMA 
No  Regis 
No  DEC  CRT 


No  Escape 
No  Tab 

No  Holdscreen 
No  Form 
Autobaud 
No  Altypeahd 
No  Block  mode 


In  addition  to  these  characteristics,  the  terminal  speed  must  be  set 
to  1200  baud.  If  the  terminal  port  is  not  configured  in  this  manner, 
see  the  ASW  VAX  system  manager  to  make  the  changes. 

The  ASW  VAX  uses  the  VMS  operating  system  ($  prompting).  The 
following  protocol  is  necessary  for  the  ASW  VAX  and  the  MILNET  VAX  to 
communicate  using  KERMIT.  TTA4:  Is  the  terminal  port  over  which 
these  communications  will  take  place.  After  this  sequence  completes, 
the  direct  access  permanent  loadtape  file,  ds40911,  that  was  created 
In  Chapter  6  and  transferred  to  the  MILNET  VAX  in  Chapter  7,  will 
reside  on  the  ASW  VAX.  Appendix  C  contains  a  listing  of  the  VAX-11 
KERMIT  commands  obtained  by  Issuing  the  VMS  command,  HELP  KERMIT. 
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Username:  NSWC 
Password : 

Welcome  to  VAX/VMS  version  V3.6  on  node  VAX 

$  KERMIT 

VMS  Kermit-32  version  3.0.051 

Default  terminal  for  transfers  Is  _TTC1: 

Kerm1t-32>  SET  INCOMPLETE  FILE  DISPOSITON  KEEP 
Kerml t-32>  CONNECT  TTA4:  “ 

[VAX: :Connect1 ng  to  TTA4 :  Type  CRTL/]C  to  return  to  VAX/VMS  Kermit-32] 

ATE1F1 

OK 

ATDT43273 

CONNECT 

MILNET  HOST  "nswc-wo"  (VAX  1 1/750 : UNI X : 4 . lbsd ) 

For  login  or  problems  call  Bob  Archer'  394-1909 

login:  nswc 
Password: 

Last  Login:  day  date  time  on  ttyxx 

WELCOME  to  the  Naval  Surface  Weapons  Center-White  Oak  Network  Front  End 

1- >  tty 
/dev/tty05 

2- >  kermlt  sbl  1200  /dev/tty05  ds40911 
)S  *@*#0 

CRTL/]C 

[VAX:  Returning  to  VAX/VMS  Kermit-32] 

Kerml t-32>  RECEIVE  DS40911.DAT 

Receiving:  filename  as  ddcu : [NSWC]DS4091 1 . DAT  [OK] 

Kerml t-32>  EXIT 


CHAPTER  9 


FILE  TRANSFER  AND  LOADTAPE  GENERATION 


The  Information  contained  in  all  previous  chapters  represents 
steps  necessary  to  create  and  retrieve  to  a  "hands-on"  system 
W  VAX)  an  operational  software  loadtape  file.  The  next  step  in 
s  process  involves  copying  the  loadtape  file  from  the  ASW  VAX  disk 
9-track  magnetic  tape.  This  tape  will  then  be  copied  onto  a 
-20  disk  file.  Appendix  D  contains  the  source  listing  of  the 

tran  routine  which  performs  the  copy  from  disk  to  9-track  tape. 

:  following  five  commands  are  necessary  to  perform  the  copy.  After 
okina  the  RUN  command,  the  Fortran  Droaram  DromDts  the  user  for 
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Next,  a  UYK/20  resident  program,  LTGEN/DSF,  Is  executed  which 
converts  the  ASCII  source  file  (SGPHC/DS)  Into  an  absolute  loadtape 
Image  file.  This  absolute  loadtape  Image  file,  DS40911/DS,  contains 
the  operational  software  that  will  be  executed  on  the  AN/UYS-1 
Advanced  Signal  Processor. 

?:>*CF  0S40911/DS, ,120/400 
?:>*AS  FI  LTGEN/DSF 
? : >*LTGEN*F1 

ASSIGN  IN  TO  ASCII  SOURCE  AND  OT  TO  LOAD  TAPE  DEVICE. 

HIT  BLANK  RETURN  WHEN  DONE. 

: >*AS  IN  SGPHC/DS 
:>*AS  OT  DS4091 1/DS 
: >*RW  IN  OT 
:>  <CR> 

JOB  COMPLETED  OK 


The  final  step  in  producing  an  executable  operational  software 
loadtape  Is  the  addition  of  header  Information  describing  the  ASP 
hardware  to  the  front  end  of  the  loadtape  file.  A  UYK-20  resident 
program,  ALTP/0CT080,  provides  the  capability  of  concatenating 
front-end  header  Information  with  the  absolute  loadtape  Image  file. 
After  the  following  sequence  Is  executed,  a  9-track  magnetic  tape 
containing  the  final  output  loadtape  will  be  produced. 

?:>*AS  IN  FRONTEND/DS 
? : >*AS  OT  K1 
? : >*RW  IN  OT 
? : >*AS  F2  ALTP/0CT080 
?:>*ALTAB7»F2 
C0MMAND< 

: >C0PY  IMPL  I  PL 
NO.  OF  FILES< 

:  >  1 1 

LAST  ELEMENT  COPIED  0001 
C0MMAND< 

: >*AS  IN  DS4091 1/DS 
C0MMAND< 

: >*RW  IN 
C0MMAN0< 

: >C0PY  2201  2202 
END  OF  TAPE 

LAST  OUTPUT  ELEMENT  IS  2202 
C0MMAND< 

:>  <CR> 

STOP 

? : >*RW  K1 
?:>*0M 

DISMOUNT  -NAOC 


1 


i".iv  .v'.llVI!,.‘r.'^ 
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CHAPTER  10 

RESULTS  AND  RECOMMENDATIONS 


The  preceding  chapters  document  the  steps  necessary  to 
interactively  (vs.  remote  batch)  create  and  retrieve  operational 
software  loadtapes  from  NADC  for  testing  on  the  AN/UYS-1  Advanced 
Signal  Processor.  This  interactive  method  of  communication  took 
approximately  two  man  months  to  develop. 

Excluding  FASP  data  base  changes,  presently  the  nominal  time 
from  submission  of  the  loadtape  input  stream  to  final  retrieval  of  a 
9-track  tape  containing  executable  operational  software  Is  three 
hours.  Depending  on  the  complexity  of  data  base  changes  made  before 
loadtape  creation,  this  process  can  take  as  much  as  eight  hours. 
Further,  the  handshaking  protocol  between  various  operating  systems 
(UNIX,  KR0N0S),  editors  (VI,  FATE),  and  utility  programs  (USRDTF, 
FTP,  KERMIT),  In  addition  to  the  slower  transfer  rates,  makes  any 
type  of  change  a  complicated  process. 

The  problems  encountered  are  not  only  local  to  NSWC.  Each 
remote  user  of  FASP  has  to  design  a  method  of  interacting  with  FASP 
by  whatever  means  Is  available.  Some  type  of  standardization  to 
relieve  user  costs  and  Improve  efficiency  is  needed. 
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APPENDIX  A 
VI  EDITOR  COMMANDS 


i  text  <CR> 
I  text  <CR> 
a  text  <CR> 
A  text  <CR> 
h 
1 

j 

k 

0 

$ 

G 

nG 

w 

b 

e 


+  or  <CR> 

H 

L 

M 

CTRL/F 

CTRL/B 

CTRL/D 

CTRL/U 

CTRL/L 

x 

X 

dw 

de 

dd 

3dd 

D 

o 

0 

/pat  <CR> 
?pat  <CR> 
n 


Insert  text  before  cursor 

Insert  text  at  beginning  of  line 

Append  text  after  cursor 

Append  text  at  end  of  current  line 

Move  cursor  one  character  to  left 

Move  cursor  one  character  to  right 

Move  cursor  down  one  line 

Move  cursor  up  one  line 

Move  cursor  to  beginning  of  current  line 

Move  cursor  to  end  of  current  line 

Move  cursor  to  end  of  file 

Move  cursor  to  line  n 

Move  cursor  forward  one  word 

Move  cursor  backward  one  word 

Move  cursor  to  end  of  word 

Move  cursor  to  the  next  sentence 

Move  cursor  to  the  previous  sentence 

Move  cursor  to  next  line 

Move  cursor  to  previous  line 

Home  cursor 

Move  cursor  to  last  line  on  screen 
Move  cursor  to  middle  of  screen 
Move  cursor  forward  one  screen 
Move  cursor  backward  one  screen 
Move  cursor  forward  1/2  screen 
Move  cursor  backward  1/2  screen 
Refresh  screen 

Delete  one  character  under  cursor 
Delete  one  character  to  left  of  cursor 
Delete  one  word 

Delete  one  word  leaving  punctuation 

Delete  one  line 

Delete  three  lines 

Delete  remainder  of  current  line 

Open  a  line  below  the  cursor 

Open  a  line  above  the  cursor 

Forward  string  search 

Backward  string  search 

Find  next  occurrence  of  pattern 
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Reverse  direction  and  find  next  occcurrence 
Yank  current  line 

Put  yanked  text  after  current  line 
Put  yanked  text  before  current  line 
Undo  last  change  made 
Restore  current  line 
Repeat  last  change  made 


APPENDIX  B 


FILE  TRANSFER  PROTOCOL  (FTP)  COMMANDS 


I 

abort 

account 

acct 

append 

bye 

cd 

chdi  r 
cmd 

cmdget 

cmdsend 

command 

cwd 

del ete 
get 
hel  p 
list 
log 
mget 
mkdl  r 
mode 

mretrl eve 

msend 

mstore 

msend 

password 

port 

quit 

quote 

rate 

rename 

ret  rl eve 

rmdl  r 

send 

st  ructure 

type 

user 


Invoke  shell 

Debugging  aid:  take  a  core  dump 

Specify  account  on  foreign  host 

Specify  account  on  foreign  host 

Append  local  file  to  foreign  file 

Close  connection  and  exit 

Change  directory  on  local  host 

Change  directory  on  local  host 

Submit  a  command  to  the  other  host's  shell 

Retrieve  file  from  foreign  host  Into  filter 

Send  command  output  to  foreign  host 

Submit  a  command  to  the  other  host's  shell 

Change  directory  on  foreign  host 

Remove  a  file  from  the  foreign  host 

Retrieve  a  file  from  the  foreign  host 

Briefly  describes  commands 

Get  a  directory  listing  to  a  local  file 

Log  onto  a  foreign  host 

Multiple  retrieve 

Make  a  directory  on  the  foreign  host 
Specify  transfer  mode  (STREAM  or  BLOCK) 

Multiple  retrieve 
Multiple  store 
Multiple  store 

Get  a  directory  listing  to  a  local  file 
Tell  foreign  host  your  password 
Tell  foreign  host  which  port  to  use 
Close  the  connection  and  exit 
Send  quoted  string  to  ftp  server 

Print  accumulated  transfer  rate  and  optionally  reset 

Rename  a  file  on  the  foreign  host 

Retrieve  a  file  from  the  foreign  host 

Remove  a  directory  on  the  foreign  host 

Store  a  local  file  on  the  foreign  host 

Specify  structure  of  files  (RECORD  or  FILE) 

Specify  representation  type  (ASCII,  IMAGE  or  LOCAL) 
Tell  the  foreign  host  your  name 


B-l 


s# 
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APPENDIX  C 

VAX-11  KERMIT  COMMANDS 


KERMIT 

BYE 

This  command  will  cause  Kermit-32  (when  in  local  mode)  to  tell  the 
other  Kermit  (which  should  be  in  server  mode)  to  exit  from  Kermit 
and,  if  applicable,  terminate  Its  job  (or  process,  etc.)*  When 
Kermit-32  receives  the  acknowledgement  that  this  is  being  done,  it 
will  exit  to  VMS. 


Kermi t-32>B YE 


KERMIT 

CONNECT 


The  CONNECT  command  will  allow  you  to  connect  in  as  a  virtual 
terminal  over  the  line  that  was  specified  by  the  SET  LINE  command,  or 
to  the  terminal  1 1 ne .sped f 1 ed  in  the  command.  The  terminal  line 
must  be  one  which  is  accessible  to  the  users  process.  This  means 
that  the  applicable  protection  code  for  the  terminal  must  have  been 
set  to  allow  your  process  to  access  it  (done  by  the  system  manager). 
If  a  session  log  file  was  previously  specified,  a  new  version  of  the 
file  will  be  created,  and  all  typeout  logged  in  the  file.  The  file 
will  be  closed  when  the  command  Is  completed  (by  use  of  an 
escape-character  "C"  command).  The  format  of  the  CONNECT  command  is: 

Kermi t-32>C0NNECT 
or 

Kermi t-32>C0NNECT  TTcn: 

where  TTcn:  Is  the  terminal  line  name  to  be  used. 

KERMIT 

EXIT 


The  EXIT  command  will  cause  Kermit  to  return  to  command  level.  This 
command  is  the  same  as  the  QUIT  command.  An  example  of  this  command 
i  s : 


Kermit-32>EXIT 
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KERMIT 

FINISH 

This  command  will  cause  Kermlt-32  (when  In  local  mode)  to  tell  the 
other  Kermlt  (which  should  be  In  server  mode)  to  exit  from  Kermlt. 
After  receiving  the  acknowledgement  that  this  Is  being  done, 
Kermlt-32  will  prompt  for  another  command. 

Kerm1t-32>FINISH 


KERMIT 

GET 


The  GET  command  is  used  to  have  a  local  Kermit-32  request  a  file  from 
the  remote  Kermit.  Kermit-32  must  be  running  as  a  local  Kermlt 
(I.e.,  a  SET  LINE  command  must  have  been  done).  Kermit-32  will  then 
request  the  other  Kermit  (which  must  be  running  In  server  mode)  to 
transfer  the  specified  file  (or  set  of  files)  to  Kermit-32.  The  file 
specification  must  be  in  the  format  of  the  system  on  which  the  server 
Kermlt  Is  running.  The  format  of  the  command  is: 

Kerml t-32>GET  f il e-speci f 1 catl on 


Where  "file-specification"  is  any  valid  file  specification  on  the 
system  on  which  the  server  Kermit  is  running. 


KERMIT 

LOCAL 


I 


This  command  allows  the  user  of  Kermlt-32  to  perform  various  actions 
on  the  user's  system.  These  commands  provide  for  listing  the 
contents  of  a  directory,  deleting  files,  typing  files,  displaying  the 
amount  of  disk  space  used,  etc.  Many  of  these  commands  are  performed 
by  spawning  a  subprocess  to  execute  the  corresponding  DCL  command; 
therefore,  the  standard  parameters  and  qualifiers  which  DCL  allows 
may  be  used. 


Kermi t-32>L0CAL  keyword  arguments 

Where  keyword  is  the  name  of  the  command,  and  arguments  are  the 
optional  arguments  for  the  command. 

Additional  information  available: 

COPY  CWD  DELETE  DIRECTORY  DISK  USAGE  HELP  HOST  RENAME 
SEND  MESSAGE  TYPE  WHO 


I 

?  c-2 


KERMI T 
LOG 


The  LOG  command  allows  the  user  to  specify  the  file  names  to  be  used 
for  the  various  log  files  Kermit  is  capable  of  creating.  A  LOG 
command  without  a  file  specification  will  cause  no  log  file  of  that 
type  to  be  created. 

Kermit-32>L0G  keyword  filespec 

Where  keyword  is  DEBUG,  SESSION,  or  TRANSACTION,  and  filespec  is  the 
file  specification  to  use  for  that  type  of  log  file.  If  filespec  is 
not  present,  that  type  of  logging  is  disabled. 

Additional  Information  available: 

DEBUG  SESSION  TRANSACTION 

KERMIT 

LOGOUT 

This  command  will  cause  Kermit-32  (when  in  local  mode)  to  tell  the 
other  Kermit  (which  should  be  In  server  mode)  to  exit  from  Kermit 
and.  If  applicable,  terminate  Its  job  (or  process,  etc.).  When 
Kermit-32  receives  the  acknowledgement  that  this  is  being  done,  it 
will  prompt  for  another  command. 

Kermit-32>L0G0UT 

KERMIT 

QUIT 

This  command  will  cause  Kermit  to  return  to  command  level.  This  Is 
the  same  as  the  EXIT  command. 


Kermi t-32>QU IT 
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KERMIT 

RECEIVE 


The  RECEIVE  command  is  used  to  put  Kermit-32  into  remote  mode  waiting 
for  a  single  file  transfer  transaction.  This  is  most  useful  if  the 
other  Kermit  does  not  support  local  server  commands.  If  no  file 
specification  is  given,  Kermit-32  will  use  whatever  file 
specification  is  supplied  by  the  other  Kermit  (suitably  altered  to 
conform  to  VMS  standards).  If  a  file  specification  Is  given, 
Kermit-32  will  use  that  file  specification  instead  of  that  supplied 
by  the  other  Kermit.  This  is  most  useful  when  the  file  name  on  the 
other  system  is  such  that  it  does  not  map  well  into  a  VMS  file 
specification.  Note  that  the  other  Kermit  sends  more  than  one 

file,  the  same  name  will  be  used  for  all  of  them.  Only  the  version 
numbers  will  be  different.  Therefore,  it  is  best  to  use  a 
file-specification  on  this  command  only  when  transferring  a  single 
file.  The  format  of  the  command  is: 

Kermit-32>R£CEIVE 

or 

Kermit-32>RECEIVE  file-specification 

Where  "file-specification"  is  any  valid  VMS  file  specification. 

KERMIT 

REMOTE 

This  command  allows  the  user  of  Kermit-32  (In  local  mode)  to  give 
various  commands  to  the  other  Kermit  (which  must  be  In  server  mode). 
These  commands  provide  for  listing  the  contents  of  a  directory, 
deleting  files,  typing  files,  displaying  the  amount  of  disk  space 
used,  etc.  Note  that  not  all  server  Kermits  support  all  commands, 
but  all  server  Kermits  should  repsond  with  a  message  saying  the 
command  is  not  Implemented  If  It  does  not  support  it. 

Kermi t-32>REM0TE  keyword  arguments 

Where  keyword  is  the  name  of  the  command,  and  arguments  are  the 
optional  arguments  for  the  command. 

Additional  Information  available: 

COPY  CWD  DELETE  DIRECTORY  DISK  USAGE  EXIT  HELP  HOST 
LOGIN  LOGOUT  RENAME  SEND  MESSAGE"  STATUS  TYPE  WHO 


*  «T  k  ■'V*  k* 


fWW 


KERMIT 

SEND 

The  SEND  command  will  allow  you  to  send  a  flle(s)  to  the  other 
Kermlt.  The  SEND  command  will  allow  file  wild  card  processing  as  Is 
found  In  VMS.  If  Kermlt-32  Is  running  In  remote  mode,  the  file  will 
be  sent  on  the  controlling  terminal  ilne  after  waiting  the  number  of 
seconds  specified  by  the  SET  DELAY  command.  This  gives  the  user  time 
to  escape  back  to  the  other  Kermlt  and  Issue  a  receive  command.  If 
Kermlt-32  Is  running  In  local  mode,  the  file  will  be  sent  Immediately 
on  the  terminal  line  specified  by  the  SET  LINE  command. 

The  command  format  is: 

Kermit-32>SEND  file-specification 

Where  "file-specification"  is  any  normal  VAX/VMS  file  specification. 

KERMIT 

SERVER 

This  command  will  cause  Kermit-32  to  enter  server  mode.  The  other 
Kermit  can  then  Issue  server  commands  to  send  and  receive  files 
without  having  to  give  SEND  or  RECEIVE  commands  to  Kermlt-32. 
Kermit-32  may  be  put  into  SERVER  mode  while  running  as  either  a 
remote  Kermlt  (transmitting  over  the  controlling  terminal  line),  or 
as  a  local  Kermit  (transmitting  over  a  terminal  specified  by  a  SET 
LINE  command).  Note  that  in  order  to  correctly  receive  binary  files 
while  In  SERVER  mode,  a  SET  FILE  TYPE  BINARY  must  be  done  first.  At 
this  time  there  Is  no  way  for  Kermit-32  to  determine  whether  an 
Incoming  file  is  ASCII  or  binary. 

The  format  of  the  command  Is: 

Kermi t-32>SERVER 

KERMIT 

SET 

The  SET  command  is  used  to  set  various  parameters  In  Kermit. 
Additional  Information  available: 

BLOCK  CHECK  TYPE  DEBUGGING  DELAY  ESCAPE  FILE  IBM  MODE 
INCOMPLETE  PILE  DISPOSITION  LINE  LOCAL  ECHO  MESSAGE- 
PARITY  PROMPT  REPEAT  QUOTE  RETRY  RECEIVE  SEND 
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KERMIT 

SHOW 

The  SHOW  command  Mill  allow  you  to  show  the  various  parameters  that 
are  set  with  the  SET  command. 

Additional  Information  available: 

ALL  BLOCK  CHECK  TYPE  COMMUNICATIONS  DEBUGGING  DELAY  ESCAPE 
FILE  PARAMETERS  “FILE  TYPE  I NCOMPLETE_F I LE  DISPOSITION  LOCAL_ECHO 
PACKET  PARITY  SEND  RECEIVE  RETRY 

KERMIT 

STATUS 

The  current  status  of  Kermlt-32  will  be  displayed.  This  Includes  the 
number  of  characters  that  have  been  sent  and  received  from  the  remote 
Kermlt.  Also  Included  Is  an  estimate  of  the  effective  baud  rate  of 
the  transfer.  This  number  Is  not  intended  to  be  exact,  but  only  an 
Indication  of  what  range  of  throughput  has  been  provided. 
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APPENDIX  D 

UYKTAPE  FORTRAN  SOURCE  LISTING 


THIS  PROGRAM  GENERATES  AN  UNLABELED  CARD  IMAGE  TAPE 

IMPLICIT  INTEGER  (A-Z) 

CHARACTERM32  CARD 
CHARACTER*30  FILENAME 
C 

WRITE  (6,10) 

10  FORMAT  ('JENTER  LOADTAPE  FILENAME  TO  BE  COPIED  TO  TAPE 
READ  (5,20)  FILENAME 
20  FORMAT  (A30) 

C 

OPEN  (UNI T-4, NAME-F ILENAME  , TYPE3 ' OLD  '  , 

1  CARRIAGECONTROL3 'NONE' , ERR3 100) 

OPEN  ( UNIT-3, NAME3’ TAPE' .TYPE*' NEW* , 

1  CARRIAGECONTROL-'NONE' ) 

C 

30  READ  (4,40,END*50)  CARD 
40  FORMAT  (A) 

WRITE  (3,40)  CARD 
GO  TO  30 

50  CLOSE  (UNIT-3) 

CLOSE  (UNIT-4) 

CALL  EXIT 
C 

100  WRITE  (6,110)  FILENAME 

110  FORMAT  (*  NO  SUCH  FILE  ',A30) 

CALL  EXIT 
END 


*>rv- 
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